Imports Microsoft.VisualBasic

Public Class CLS_OBJ_DATA
    Private e As System.Web.UI.WebControls.GridViewRowEventArgs
    '-----Contructor----
    Public Sub New(ByVal _e As System.Web.UI.WebControls.GridViewRowEventArgs)
        e = _e
    End Sub

    Public Sub Obj_Label(ByVal LabelName As String, ByVal DataFields As String)
        Dim Label As Label = CType(e.Row.FindControl(LabelName), Label)
        If Not IsNothing(Label) Then
            Label.Text = e.Row.DataItem(DataFields)
        End If
    End Sub
End Class
